home *** CD-ROM | disk | FTP | other *** search
/ Otherware / Otherware_1_SB_Development.iso / mac / util / comm / virtu13.cpt / Virtuoso 1.3 ƒ / Scripts / Startup < prev   
Encoding:
Text File  |  1991-07-13  |  1006 b   |  32 lines
  1. ;Startup script:  Automatically executed when Virtuoso is started.
  2. ;The commands contained here are for a Kantronics TNC.
  3. ;Make sure TNC is in command mode, send a control-C character.
  4. TYPE("^C")
  5. ;Make sure TNC is in first channel.
  6. TYPE("|A")
  7. ;Send XON character so TNC will send us stuff.
  8. TYPE("^Q")
  9. ;Send a couple of return characters for good measure
  10. TYPE("^M^M")
  11. ;Change the CTEXT so people connecting will know I am how here.
  12. TYPE("CTEXT Greetings!  I'm near the keyboard...^M")
  13. ;Allow the CTEXT message to be sent when someone connects.
  14. TYPE("CMSG ON^M")
  15. ;Turn on monitoring
  16. TYPE("MONITOR ON^M")
  17. ;Send one return character for good measure
  18. TYPE("^M")
  19. ;Going to set the TNC's clock.  Command is DAYT YYMMDDHHMMSS
  20. ;Send the DAYT part
  21. TYPE("DAYT ")
  22. ;Wait for the TNC to catch up with us
  23. PAUSE(40)
  24. ;Send the YYMMDDHHMMSS part of the command
  25. DAYT
  26. ;Wait for the TNC to catch up with us
  27. PAUSE(5)
  28. ;Hit return to enter the command
  29. TYPE("^M")
  30. ;Find out who was last heard on the channel
  31. TYPE("MHEARD L^M")
  32. END.